Top 10k strings from Spectrum Game Writers' Pack - Cards (1983)(Collins Educational).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   1 W$=D$(H,N)
   1 SWITCH NEEDED ?
   1 S=SWITCH DONE
   1 PRINTS HANDS
   1 PICTURE CARDS
   1 PICKS SUIT
   1 PICKS CARD VALUE
   1 ONE HAND AT A TIME
   1 INTRODUCTION
   1 FULLY SORTED. READY TO PLAY.
   1 D$(H,N,2)=CARD VALUE
   1 D$(H,N,1)=SUIT GRAPHIC
   1 D$(H,N)=D$(H,N+1
   1 CHECKS NOT USED ALREADY
   1 CHECKS FOR ANY LEFT
   1 CARDS     
   1 ;"YOU MAY LIKE TO LIST THIS."
   1 ;"THIS PROGRAM SHUFFLES,DEALS AND"
   1 ;"THE HEART OF THIS PROGRAM "
   1 ;"SORTS A PACK OF CARDS."
   1 ;"PRESS ANY KEY TO WATCH."
   1 ;"PRESS ANY KEY TO GO ON."
   1 ;"NOW THEY NEED SORTING"
   1 ;"LINE 600 ONWARDS."
   1 ;"IS THE SORTING ROUTINE FROM                                    "
   1 ;"HOLD DOWN A KEY FOR FAST SORT"
   1 ;"HAND ";H
   1 "PRESS ANY KEY TO SEE HANDS."
   1 "ALL DEALT."''
   1 "  THIS TAKES ABOUT 20 SECONDS."''
   1 "  SHUFFLING
   1 "  I AM DEFINING GRAPHICS"
   1 "  HERE THEY COME"''
   1 "   DONE.":
   1  MACBRIDE 1983 <<
   1  AND DEALING."'':